home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 7 / PC World Interactive 7.iso / bb2000 / files / Exit.dxr / 00013.ls < prev    next >
Encoding:
Text File  |  1998-02-20  |  203 b   |  16 lines
  1. global gCount
  2.  
  3. on startMovie
  4.   set gCount to 0
  5. end
  6.  
  7. on change
  8.   set gCount to gCount + 1
  9.   cursor([gCount, gCount + 4])
  10.   if gCount > 4 then
  11.     set gCount to 0
  12.     cursor(-1)
  13.     go(#next)
  14.   end if
  15. end
  16.